/*
EP3D is a real-time 3D planet engine , which in addition to providing 
substandard scene rendering and scene management, of course, it also 
provides some basic class libraries to build the entire virtual 
planet, or even the entire universe.

Copyright (C) 2010  Hongjiang Zhang	(zhjwyat@gmail.com)

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

//#include "EP3DFixedAllocator.h"
//#include "EP3DLogger.h"
//#include "EP3DMath.h"
//namespace
//{
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Chunk::Init
//	// Initializes a chunk object
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Chunk::Init(size_t blockSize, unsigned char blocks)
//	{
//		LogAssert(blockSize > 0);
//		LogAssert(blocks > 0);
//		// Overflow check
//		LogAssert((blockSize * blocks) / blockSize == blocks);
//
//		pData_ = (char*)malloc(blockSize * blocks);
//		Reset(blockSize, blocks);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Chunk::Reset
//	// Clears an already allocated chunk
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Chunk::Reset(size_t blockSize, uchar blocks)
//	{
//		LogAssert(blockSize > 0);
//		LogAssert(blocks > 0);
//		// Overflow check
//		LogAssert((blockSize * blocks) / blockSize == blocks);
//
//		firstAvailableBlock_ = 0;
//		blocksAvailable_ = blocks;
//
//		unsigned char i = 0;
//		unsigned char* p = pData_;
//		for (; i != blocks; p += blockSize)
//		{
//			*p = ++i;
//		}
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Chunk::Release
//	// Releases the data managed by a chunk
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Chunk::Release()
//	{
//		free(pData_);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Chunk::Allocate
//	// Allocates a block from a chunk
//	////////////////////////////////////////////////////////////////////////////////
//
//	void* FixedAllocator::Chunk::Allocate(size_t blockSize)
//	{
//		if (!blocksAvailable_) return 0;
//
//		LogAssert((firstAvailableBlock_ * blockSize) / blockSize == 
//			firstAvailableBlock_);
//
//		uchar* pResult =
//			pData_ + (firstAvailableBlock_ * blockSize);
//		firstAvailableBlock_ = *pResult;
//		--blocksAvailable_;
//
//		return pResult;
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Chunk::Deallocate
//	// Dellocates a block from a chunk
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Chunk::Deallocate(void* p, size_t blockSize)
//	{
//		LogAssert(p >= pData_);
//
//		uchar* toRelease = static_cast<uchar*>(p);
//		// Alignment check
//		LogAssert((toRelease - pData_) % blockSize == 0);
//
//		*toRelease = firstAvailableBlock_;
//		firstAvailableBlock_ = static_cast<uchar>(
//			(toRelease - pData_) / blockSize);
//		// Truncation check
//		LogAssert(firstAvailableBlock_ == (toRelease - pData_) / blockSize);
//
//		++blocksAvailable_;
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::FixedAllocator
//	// Creates a FixedAllocator object of a fixed block size
//	////////////////////////////////////////////////////////////////////////////////
//
//	FixedAllocator::FixedAllocator(size_t blockSize)
//		: blockSize_(0)
//		, allocChunk_(0)
//		, deallocChunk_(0)
//	{
//		LogAssert(blockSize_ > 0);
//
//		prev_ = next_ = this;
//
//		size_t numBlocks = DEFAULT_CHUNK_SIZE / blockSize_;
//		if (numBlocks > UCHAR_MAX) numBlocks = UCHAR_MAX;
//		else if (numBlocks == 0) numBlocks = 8 * blockSize;
//
//		numBlocks_ = static_cast<uchar>(numBlocks);
//		LogAssert(numBlocks_ == numBlocks);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::~FixedAllocator
//	////////////////////////////////////////////////////////////////////////////////
//
//	FixedAllocator::~FixedAllocator()
//	{
//		if (prev_ != this)
//		{
//			prev_->next_ = next_;
//			next_->prev_ = prev_;
//			return;
//		}
//
//		LogAssert(prev_ == next_);
//		for (int i = 0; i < numChunks_; ++i)
//		{
//			LogAssert(chunks_[i].blocksAvailable_ == numBlocks_);
//			chunks_[i].Release();
//		}
//	}
//
//	FixedAllocator& FixedAllocator::operator=(const FixedAllocator& rhs)
//	{
//		FixedAllocator copy(rhs);
//		copy.Swap(*this);
//		return *this;
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Swap
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Swap(FixedAllocator& rhs)
//	{
//		using namespace std;
//
//		Math<size_t>::Swap(blockSize_, rhs.blockSize_);
//		Math<size_t>::Swap(numBlocks_, rhs.numBlocks_);
//		chunks_.swap(rhs.chunks_);
//		Math<size_t>::Swap(allocChunk_, rhs.allocChunk_);
//		Math<size_t>::Swap(deallocChunk_, rhs.deallocChunk_);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Allocate
//	// Allocates a block of fixed size
//	////////////////////////////////////////////////////////////////////////////////
//
//	void* FixedAllocator::Allocate()
//	{
//		if (allocChunk_ == 0 || allocChunk_->blocksAvailable_ == 0)
//		{
//			int i = 0;
//			for (;; ++i)
//			{
//				if (i == maxnumChunks_)
//				{
//					Reserve(maxnumChunks_ + 1);
//					Chunk newChunk;
//					newChunk.Init(blockSize_, numBlocks_);
//					Push_Back(newChunk);
//					allocChunk_ = &newChunk;
//					deallocChunk_ = chunks_;
//					break;
//				}
//				if (chunks_[i].blocksAvailable_ > 0)
//				{
//					allocChunk_ = (chunks_ + i);
//					break;
//				}
//			}
//		}
//		LogAssert(allocChunk_ != 0);
//		LogAssert(allocChunk_->blocksAvailable_ > 0);
//
//		return allocChunk_->Allocate(blockSize_);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::Deallocate
//	// Deallocates a block previously allocated with Allocate
//	// (undefined behavior if called with the wrong pointer)
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::Deallocate(void* p)
//	{
//		LogAssert(numChunks_ > 0);
//		LogAssert(chunks_ <= deallocChunk_);
//		LogAssert((chunks_ + numChunks_ - 1) >= deallocChunk_);
//
//		deallocChunk_  = VicinityFind(p);
//		LogAssert(deallocChunk_);
//
//		DoDeallocate(p);
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::VicinityFind (internal)
//	// Finds the chunk corresponding to a pointer, using an efficient search
//	////////////////////////////////////////////////////////////////////////////////
//
//	FixedAllocator::Chunk* FixedAllocator::VicinityFind(void* p)
//	{
//		LogAssert(numChunks_ > 0);
//		LogAssert(deallocChunk_);
//
//		const size_t chunkLength = numBlocks_ * blockSize_;
//
//		Chunk* lo = deallocChunk_;
//		Chunk* hi = deallocChunk_ + 1;
//		Chunk* loBound = chunks_;
//		Chunk* hiBound = &chunks_[numChunks_];
//
//		// Special case: deallocChunk_ is the last in the array
//		if (hi == hiBound) hi = 0;
//
//		for (;;)
//		{
//			if (lo)
//			{
//				if (p >= lo->pData_ && p < lo->pData_ + chunkLength)
//				{
//					return lo;
//				}
//				if (lo == loBound) lo = 0;
//				else --lo;
//			}
//
//			if (hi)
//			{
//				if (p >= hi->pData_ && p < hi->pData_ + chunkLength)
//				{
//					return hi;
//				}
//				if (++hi == hiBound) hi = 0;
//			}
//		}
//
// 		LogAssert(false);
// 		return NULL;
//	}
//
//	////////////////////////////////////////////////////////////////////////////////
//	// FixedAllocator::DoDeallocate (internal)
//	// Performs deallocation. Assumes deallocChunk_ points to the correct chunk
//	////////////////////////////////////////////////////////////////////////////////
//
//	void FixedAllocator::DoDeallocate(void* p)
//	{
//		LogAssert(deallocChunk_->pData_ <= p);
//		LogAssert(deallocChunk_->pData_ + numBlocks_ * blockSize_ > p);
//
//		// call into the chunk, will adjust the inner list but won't release memory
//		deallocChunk_->Deallocate(p, blockSize_);
//
//		if (deallocChunk_->blocksAvailable_ == numBlocks_)
//		{
//			// deallocChunk_ is completely free, should we release it? 
//
//			Chunk& lastChunk = chunks_[numChunks_ - 1];
//
//			if (&lastChunk == deallocChunk_)
//			{
//				// check if we have two last chunks empty
//
//				if (numChunks_ > 1 && 
//					deallocChunk_[-1].blocksAvailable_ == numBlocks_)
//				{
//					// Two free chunks, discard the last one
//					lastChunk.Release();
//					Pop_Back();
//					allocChunk_ = deallocChunk_ = chunks_;
//				}
//				return;
//			}
//
//			if (lastChunk.blocksAvailable_ == numBlocks_)
//			{
//				// Two free blocks, discard one
//				lastChunk.Release();
//				Pop_Back();
//				allocChunk_ = deallocChunk_;
//			}
//			else
//			{
//				// move the empty chunk to the end
//				Math<Chunk>::Swap(*deallocChunk_, lastChunk);
//				allocChunk_ = &chunks_[numChunks_ - 1];
//			}
//		}
//	}
//}